<?php

/**
 * @file
 * Admin page callbacks for the comment module.
 */

/**
 * Menu callback; present an administrative comment listing.
 */
function comment_admin($type = 'new') {
	$edit = $_POST;

	if (isset($edit['operation']) && ($edit['operation'] == 'delete') && isset($edit['comments']) && $edit['comments']) {
		return drupal_get_form('comment_multiple_delete_confirm');
	}
	else {
		return drupal_get_form('comment_admin_overview', $type);
	}
}

/**
 * Form builder for the comment overview administration form.
 *
 * @param $arg
 *   Current path's fourth component: the type of overview form ('approval' or
 *   'new').
 *
 * @ingroup forms
 * @see comment_admin_overview_validate()
 * @see comment_admin_overview_submit()
 * @see theme_comment_admin_overview()
 */
function comment_admin_overview($form, &$form_state, $arg) {
	// Build an 'Update options' form.
	$form['options'] = array(
			'#type' => 'fieldset',
			'#title' => t('Update options'),
			'#attributes' => array('class' => array('container-inline')),
	);

	if ($arg == 'approval') {
		$options['publish'] = t('Publish the selected comments');
	}
	else {
		$options['unpublish'] = t('Unpublish the selected comments');
	}
	$options['delete'] = t('Delete the selected comments');

	$form['options']['operation'] = array(
			'#type' => 'select',
			'#title' => t('Operation'),
			'#title_display' => 'invisible',
			'#options' => $options,
			'#default_value' => 'publish',
	);
	$form['options']['submit'] = array(
			'#type' => 'submit',
			'#value' => t('Update'),
	);

	// Load the comments that need to be displayed.
	$status = ($arg == 'approval') ? COMMENT_NOT_PUBLISHED : COMMENT_PUBLISHED;
	$header = array(
			'subject' => array('data' => t('Subject'), 'field' => 'subject'),
			'author' => array('data' => t('Author'), 'field' => 'name'),
			'posted_in' => array('data' => t('Posted in'), 'field' => 'node_title'),
			'changed' => array('data' => t('Updated'), 'field' => 'c.changed', 'sort' => 'desc'),
			'operations' => array('data' => t('Operations')),
	);

	$query = db_select('comment', 'c')->extend('PagerDefault')->extend('TableSort');
	$query->join('node', 'n', 'n.nid = c.nid');
	$query->addField('n', 'title', 'node_title');
	$query->addTag('node_access');
	$result = $query
	->fields('c', array('cid', 'subject', 'name', 'changed'))
	->condition('c.status', $status)
	->limit(50)
	->orderByHeader($header)
	->execute();

	$cids = array();

	// We collect a sorted list of node_titles during the query to attach to the
	// comments later.
	foreach ($result as $row) {
		$cids[] = $row->cid;
		$node_titles[] = $row->node_title;
	}
	$comments = comment_load_multiple($cids);

	// Build a table listing the appropriate comments.
	$options = array();
	$destination = drupal_get_destination();

	foreach ($comments as $comment) {
		// Remove the first node title from the node_titles array and attach to
		// the comment.
		$comment->node_title = array_shift($node_titles);
		$options[$comment->cid] = array(
				'subject' => array(
						'data' => array(
								'#type' => 'link',
								'#title' => $comment->subject,
								'#href' => 'comment/' . $comment->cid,
								'#options' => array('attributes' => array('title' => truncate_utf8($comment->comment_body[LANGUAGE_NONE][0]['value'], 128)), 'fragment' => 'comment-' . $comment->cid),
						),
				),
				'author' => theme('username', array('account' => $comment)),
				'posted_in' => array(
						'data' => array(
								'#type' => 'link',
								'#title' => $comment->node_title,
								'#href' => 'node/' . $comment->nid,
						),
				),
				'changed' => format_date($comment->changed, 'short'),
				'operations' => array(
						'data' => array(
								'#type' => 'link',
								'#title' => t('edit'),
								'#href' => 'comment/' . $comment->cid . '/edit',
								'#options' => array('query' => $destination),
						),
				),
		);
	}

	$form['comments'] = array(
			'#type' => 'tableselect',
			'#header' => $header,
			'#options' => $options,
			'#empty' => t('No comments available.'),
	);

	$form['pager'] = array('#theme' => 'pager');

	return $form;
}

/**
 * Validate comment_admin_overview form submissions.
 */
function comment_admin_overview_validate($form, &$form_state) {
	$form_state['values']['comments'] = array_diff($form_state['values']['comments'], array(0));
	// We can't execute any 'Update options' if no comments were selected.
	if (count($form_state['values']['comments']) == 0) {
		form_set_error('', t('Select one or more comments to perform the update on.'));
	}
}

/**
 * Process comment_admin_overview form submissions.
 *
 * Execute the chosen 'Update option' on the selected comments, such as
 * publishing, unpublishing or deleting.
 */
function comment_admin_overview_submit($form, &$form_state) {
	$operation = $form_state['values']['operation'];
	$cids = $form_state['values']['comments'];

	if ($operation == 'delete') {
		comment_delete_multiple($cids);
	}
	else {
		foreach ($cids as $cid => $value) {
			$comment = comment_load($value);

			if ($operation == 'unpublish') {
				$comment->status = COMMENT_NOT_PUBLISHED;
			}
			elseif ($operation == 'publish') {
				$comment->status = COMMENT_PUBLISHED;
			}
			comment_save($comment);
		}
	}
	drupal_set_message(t('The update has been performed.'));
	$form_state['redirect'] = 'admin/content/comment';
	cache_clear_all();
}

/**
 * List the selected comments and verify that the admin wants to delete them.
 *
 * @param $form_state
 *   An associative array containing the current state of the form.
 * @return
 *   TRUE if the comments should be deleted, FALSE otherwise.
 * @ingroup forms
 * @see comment_multiple_delete_confirm_submit()
 */
function comment_multiple_delete_confirm($form, &$form_state) {
	$edit = $form_state['input'];

	$form['comments'] = array(
			'#prefix' => '<ul>',
			'#suffix' => '</ul>',
			'#tree' => TRUE,
	);
	// array_filter() returns only elements with actual values.
	$comment_counter = 0;
	foreach (array_filter($edit['comments']) as $cid => $value) {
		$comment = comment_load($cid);
		if (is_object($comment) && is_numeric($comment->cid)) {
			$subject = db_query('SELECT subject FROM {comment} WHERE cid = :cid', array(':cid' => $cid))->fetchField();
			$form['comments'][$cid] = array('#type' => 'hidden', '#value' => $cid, '#prefix' => '<li>', '#suffix' => check_plain($subject) . '</li>');
			$comment_counter++;
		}
	}
	$form['operation'] = array('#type' => 'hidden', '#value' => 'delete');

	if (!$comment_counter) {
		drupal_set_message(t('There do not appear to be any comments to delete, or your selected comment was deleted by another administrator.'));
		drupal_goto('admin/content/comment');
	}
	else {
		return confirm_form($form,
				t('Are you sure you want to delete these comments and all their children?'),
				'admin/content/comment', t('This action cannot be undone.'),
				t('Delete comments'), t('Cancel'));
	}
}

/**
 * Process comment_multiple_delete_confirm form submissions.
 */
function comment_multiple_delete_confirm_submit($form, &$form_state) {
	if ($form_state['values']['confirm']) {
		comment_delete_multiple(array_keys($form_state['values']['comments']));
		cache_clear_all();
		$count = count($form_state['values']['comments']);
		watchdog('content', 'Deleted @count comments.', array('@count' => $count));
		drupal_set_message(format_plural($count, 'Deleted 1 comment.', 'Deleted @count comments.'));
	}
	$form_state['redirect'] = 'admin/content/comment';
}

/**
 * Page callback for comment deletions.
 */
function comment_confirm_delete_page($cid) {
	if ($comment = comment_load($cid)) {
		return drupal_get_form('comment_confirm_delete', $comment);
	}
	return MENU_NOT_FOUND;
}

/**
 * Form builder; Builds the confirmation form for deleting a single comment.
 *
 * @ingroup forms
 * @see comment_confirm_delete_submit()
 */
function comment_confirm_delete($form, &$form_state, $comment) {
	$form['#comment'] = $comment;
	// Always provide entity id in the same form key as in the entity edit form.
	$form['cid'] = array('#type' => 'value', '#value' => $comment->cid);
	return confirm_form(
			$form,
			t('Are you sure you want to delete the comment %title?', array('%title' => $comment->subject)),
			'node/' . $comment->nid,
			t('Any replies to this comment will be lost. This action cannot be undone.'),
			t('Delete'),
			t('Cancel'),
			'comment_confirm_delete');
}

/**
 * Process comment_confirm_delete form submissions.
 */
function comment_confirm_delete_submit($form, &$form_state) {
	$comment = $form['#comment'];
	// Delete the comment and its replies.
	comment_delete($comment->cid);
	drupal_set_message(t('The comment and all its replies have been deleted.'));
	watchdog('content', 'Deleted comment @cid and its replies.', array('@cid' => $comment->cid));
	// Clear the cache so an anonymous user sees that his comment was deleted.
	cache_clear_all();

	$form_state['redirect'] = "node/$comment->nid";
}
